home *** CD-ROM | disk | FTP | other *** search
/ InterNet Essentials for Pharmacists / InterNet Essentials for Pharmacists.iso / InterNet.exe / InterNet.dxr / 00005_HandPointer.ls < prev    next >
Encoding:
Text File  |  2000-11-16  |  403 b   |  23 lines
  1. on mouseWithin
  2.   cursor(200)
  3.   if sprite(50).visible = 0 then
  4.     sprite(50).visible = 1
  5.   end if
  6.   sprite(50).locH = the mouseH
  7.   sprite(50).locV = the mouseV
  8. end
  9.  
  10. on mouseDown
  11.   set the member of sprite 50 to member("handDown")
  12. end
  13.  
  14. on mouseUp
  15.   set the member of sprite 50 to member("hand")
  16. end
  17.  
  18. on mouseLeave
  19.   sprite(50).visible = 0
  20.   set the member of sprite 50 to member("hand")
  21.   cursor(-1)
  22. end
  23.